program grabinfo;

{$APPTYPE CONSOLE}

uses
  RaApplication,
  RaApplicationExe,
  RaConfig,
  main in 'main.pas' {frmMain},
  Menu in 'Menu.pas' {frmMenu},
  Stat in 'Stat.pas' {Form1};

{$R *.res}

begin
  WriteLn('http://localhost:88/ - open in browser');
  Application.Initialize;
  Application.Config.Port := 88;
  Application.Config.WwwDiskDirectory := 'C:\Users\Aliev\Documents\Raudus\www';
  Application.Config.SchedulerMode := rsmRunInSuperThread;
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TfrmMenu, frmMenu);
  Application.CreateForm(TForm1, Form1);
  Application.Config.CachePolicy := cpCacheNothing;
  Application.Config.CookiesExpireOnBrowserExit := true;
  Application.Run;
end.
